home *** CD-ROM | disk | FTP | other *** search
/ Mac Format 1994 August / August CD.bin / Shareware / Games / Core War / Battle Programs / contest92 / B06 ABS EriTQ < prev    next >
Text File  |  1993-01-14  |  1KB  |  41 lines
  1. ; Programa EriTQ
  2. ; Autor : Hernán G. Freedman
  3. ; Torneo de Core-War
  4. ; Argentina  1992
  5. ;
  6.           jmp start
  7.           dat  #0                  ;-
  8.           dat  #0                  ;-
  9.           dat  #0                  ;1
  10.           dat  #0                  ;2
  11.           dat  #0                  ;3
  12. posi      dat  #0                  ;4
  13. posicion  dat  #20                 ;5
  14. bomb      dat  #2                  ;6
  15.           dat  #0                  ;-
  16.           dat  #0                  ;-
  17. start     mov  cjmp     <bomb      ;1
  18. sub1      sub  #23       bomb      ;2
  19.           mov  posicion @bomb      ;3
  20.           sub  bomb     @bomb      ;4
  21.           djn  start    contador   ;5
  22.           jmp  salva               ;6
  23.           dat  #0                  ;-
  24.           dat  #0                  ;-
  25. cjmp      jmp  @1                  ;1
  26. contador  dat  #1800               ;2
  27. quedate   jmp  quedate             ;3
  28.           dat  #0                  ;4
  29.           dat  #0                  ;5
  30.           dat  #0                  ;6
  31.           dat  #0                  ;-
  32.           dat  #0                  ;-
  33. salva     spl  quedate             ;1
  34. start2    mov  #900      contador  ;2
  35.           add  #1301     posicion  ;3
  36. cont      spl  cont                ;4
  37.           mov  posi      <posi     ;5
  38.           jmp  cont                ;6
  39.           dat  #0                  ;-
  40.           dat  #0                  ;-
  41.